home *** CD-ROM | disk | FTP | other *** search
/ Day Cry / Day Cry CD.bin / oh_towns / taropyon / he386 / ccisrc / gm.c < prev    next >
Text File  |  1994-09-20  |  1KB  |  46 lines
  1.  
  2. char    *GmFuncTbl[2] =
  3. {
  4.     "exGM_systemOn" ,
  5.     NULL
  6. };
  7.  
  8. int        GM_macroInit( char *sqr )
  9. {
  10.     int            i;
  11.  
  12.     for ( i = 0; GmFuncTbl[i] != NULL; ++i )
  13.         MMac_extDefine( sqr, GmFuncTbl[i], GmFuncTbl[i], MMAC_ATT_EXT, NULL );
  14.     MMac_extDefine( sqr, "_GM_MACRO_DEFINED", "", MMAC_ATT_NORMAL , NULL );
  15.     return (NORMAL);
  16. }
  17.  
  18.  
  19. /*************************************************************************
  20. *    GM system on
  21. *-------------------------------------------------------------------------
  22. *    usage    $exGM_systemOn()
  23. *************************************************************************/
  24.  
  25. int        exGM_systemOn( char *sqr, size_t bufSiz, char *buf, int argc, char **argv )
  26. {
  27.     char        dat[32], tmp[256];
  28.     unsigned    siz;
  29.  
  30.     dat[0] = 0xF0;
  31.     dat[1] = 0x7E;
  32.     dat[2] = 0x7F;
  33.     dat[3] = 0x09;
  34.     dat[4] = 0x01;
  35.     dat[5] = 0xF7;
  36.     siz = 6;
  37.     siz = make_sysEx(tmp, siz, dat );
  38.     if ( siz >= bufSiz )
  39.     {
  40.         MM_setErrMsg(sqr,_OUT_OF_STRING_SPACE);
  41.         return (ERR);
  42.     }
  43.     memcpy( buf, tmp, siz );
  44.     return (siz);
  45. }
  46.